COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	begin
C00005 ENDMK
C⊗;
begin

require "outdd[s,pmf]" load_module;

external procedure outdd(string s);


WHILE TRUE DO BEGIN

outdd(" 
                ***
               *   *
               *   *
                ***  *
                 *   *
                 *   *
              *******
              *  *
             *   *
             *   *
                 *
                * *
               *   *
              *     *
             *       *
");


outdd(" 
               ***
              *   *
              *   *
               ***     *
                 *    *
                 *   *
              *******
              *  *
             *   *
             *   *
                 *
                * *
               *   *
              *     *
             *       *
");

outdd(" 
              ***
             *   *
             *   *
              ***       *
                 *     *
                 *    *
              ********
              *  *
             *   *
             *   *
                 *
                * *
               *   *
              *     *
             *       *
");

outdd(" 
      
             ***
            *   *
            *   *
             *** *       *
                 *     *
              ********
              *  *
             *   *
             *   *
                 *
                * *
               *   *
              *     *
             *       *
");

outdd(" 
       
            ***
           *   *
           *   *
            ***  *
                 *      *
              **********
              *  *
             *   *
             *   *
                 *
                * *
               *   *
              *     *
             *       *
");
END;

end;